home *** CD-ROM | disk | FTP | other *** search
/ Beyond Sanit-E 4 / Beyond Sanit-E 4 (Disk 2 of 2).adf / BS1Install.HD next >
Text File  |  1995-11-27  |  2KB  |  60 lines

  1. ; ** Beyond Sanit-e Installer. **
  2. ; ** (c) SLADE - PTK  1996. **
  3. ; ** This Installer is full of comment.  I have commented it this much **
  4. ; ** so you could use to as a tutorial to teach yourself.  Have Fun!!. **
  5.     
  6.  
  7. (complete 0)
  8. (set BS-E-dest
  9.     (askdir
  10.         (prompt "Please Select or create a drawer to install Beyond>Sanit-E<One:")
  11.             (help ask-dirhelp
  12.             "\n"
  13.             "This will ask you to give a destination drawer to "
  14.             "which this issue will be installed.\n")
  15.         (default @default-dest)
  16.     )
  17. )
  18.  
  19. (set @default-dest BS-E-dest)
  20.  
  21.  
  22. (complete 30)
  23. (
  24. (working "Installing Beyond>Sanit-<ONE:...")
  25.     (copyfiles
  26.         (prompt "")
  27.         (help @copyfiles-help)
  28.         (source "Beyond>Sanit-E<ONE:")
  29.         (dest @default-dest)
  30.         (pattern "#?")
  31.         (infos)
  32.     )
  33. )
  34.  
  35. (complete 70)
  36.  
  37. (startup "Beyond>Sanit-E<ONE:"
  38. (prompt "The following assign. \n"
  39.      "ASSIGN BEYOND>SANIT-E<ONE: to " BS-E-dest ""
  40.      "\n"
  41.      "will be added to your user-startup")
  42. (help "This adds the line Assign Beyond>Sanit-E<ONE: to your user-startup")
  43. (command "ASSIGN Beyond>Sanit-E<ONE: " BS-E-dest "")
  44. )
  45.  
  46.  
  47.  
  48.  
  49. (complete 100)
  50. (exit)
  51.  
  52. ; ** Well theres goes the first Issue !.
  53. ; ** Why do you want to install this anyway ?
  54.  
  55.     
  56.     
  57.         
  58.  
  59.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           
  60.